home *** CD-ROM | disk | FTP | other *** search
/ CDV Software Presents (USA) / CDV Software Presents (USA).bin / data / menu.dxr / 00012_SliderKnopf.ls < prev    next >
Encoding:
Text File  |  2003-04-02  |  344 b   |  17 lines
  1. on mouseDown
  2.   global gSliderKnopf, gSliderMax, gSliderMin
  3.   repeat while the stillDown
  4.     newV = the mouseV
  5.     if newV < gSliderMin then
  6.       newV = gSliderMin
  7.     else
  8.       if newV > gSliderMax then
  9.         newV = gSliderMax
  10.       end if
  11.     end if
  12.     sprite(gSliderKnopf).locV = newV
  13.     updateStage()
  14.     updateText()
  15.   end repeat
  16. end
  17.